home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 16 / CU Amiga Magazine's Super CD-ROM 16 (1997-10-16)(EMAP Images)(GB)[!][issue 1997-11].iso / CUCD / Utilities / GuruStatistix / Install < prev    next >
Text File  |  1997-09-09  |  9KB  |  334 lines
  1. ; * $VER: Install GuruStatistix 1.0
  2. ; * Script written by Eckhard Ludwig
  3. ;=============================================================================
  4.  
  5. (complete 0)
  6.  
  7. (set Opt 2)
  8. (set #welcome
  9.   (cat
  10.         "\n\n\nWelcome to the GuruStatistix installation utility.\n\n"
  11.         "This program lets you install GuruStatistix 1.34 on your Amiga.\n\n\n"
  12.         "GuruStatistix © 1997 Steffen Clemenz. This is freeware."
  13.   ))
  14.  
  15. (set #choose-text
  16.   (cat "Please choose a directory where to put GuruStatistix-drawer."
  17.   ))
  18.  
  19. (set #choose-textviewer
  20.   (cat "Please choose your favourite textviewing utility."
  21.   ))
  22.  
  23. (set #choose-help
  24.   (cat "In this location a drawer will be created. All files will be installed inside this drawer."
  25.   ))
  26.  
  27. (set #inst-main
  28.   (cat "Installing GuruStatistix ..."
  29.   ))
  30.  
  31. (set #inst-Lokale
  32.   (cat "Installing Locale ..."
  33.   ))
  34.  
  35. (set #create-maindir
  36.   (cat "Creating GuruStatistix directory"
  37.   ))
  38.  
  39. (set #Locale-Copy   "Copy catalogue ...")
  40.  
  41. (set #choose-locale
  42.   (cat "Where to put locale-file? Choose a directory."
  43.   ))
  44.  
  45. (set #copy-locale
  46.   (cat "Copying Lokale-Files"
  47.   ))
  48.  
  49. (set #copyfiles-help
  50.   (cat "This copies the files to the selected directory."
  51.   ))
  52.  
  53. (set #inst-main
  54.   (cat "Installing main program ..."
  55.   ))
  56.  
  57. (set #choose-gurudat
  58.   (cat "Where is mcp.gurudat? And how is the name of the file?"
  59.   ))
  60.  
  61. (set #gurudat-help
  62.   (cat "I must now where is the mcp.gurudat-file."
  63.   ))
  64.  
  65. (set #choose-guruhistory   "Where is the Guruhistory-file? And which name it had?")
  66.  
  67. (set #guruhistory-help   "I need the Guruhistory-file, because this is the file i want to analyse.")
  68.  
  69. (set #choose-docs   "Where to put the document? No drawer will be created.")
  70.  
  71. (set #docs-help   "This function copies the document to the selected directory.")
  72.  
  73. (set #copydocs   "Copying documentation?")
  74.  
  75. (set #copydocs-help   "Should I?")
  76.  
  77. (set #choose-stats   "Where to put statistic-files GuruChart? A drawer will be generated there.")
  78.  
  79. (set #stats-help   "This is the directory to backup the GuruCharts with date and time, so you can read and compare the GuruCharts whenever you want.")
  80.  
  81.  (SET #exit-Msg 
  82.   (CAT "\n\nMuch fun with my programm\n Thanx goes to the MCP-Developers.\n\n"
  83.                    "Steffen Clemenz"
  84.   ))
  85.  
  86. ; deutsche Texte *****************************
  87.  
  88. (IF (= @language "deutsch")
  89. (
  90. (set Opt 1)
  91. (set #welcome
  92.   (cat
  93.         "\n\n\nWillkommen zu dem GuruStatistix Installer.\n\n"
  94.         "Dieses Programm installiert GuruStatistix 1.34 auf Ihrem Amiga.\n\n\n"
  95.         "Gurustatistix ist ©1997 von Steffen Clemenz. Gewidmet Matthias Zinke."
  96.   ))
  97.  
  98. (set #choose-text
  99.   (cat "Bitte wählen Sie das Verzeichniss wohin GuruStatistix installiert werden soll. Dieses Installationsscript legt dort selbst eine Schublade an."
  100.   ))
  101.  
  102. (set #choose-textviewer
  103.   (cat "Bitte wähle Deinen favorisierten Textanzeiger."
  104.   ))
  105.  
  106. (set #textviewer-help
  107.   (cat "Den Textanzeiger benötigst Du damit Du das Ergebnis des GuruStatistix-Programms nach dem Ende des Programms sofort ansehen kannst."
  108.   ))
  109.  
  110. (set #choose-help
  111.   (cat "Bei der Installation werden alle Dateien in dieses Verzeichniss installiert."
  112.   ))
  113.  
  114. (set #create-maindir
  115.   (cat "Erstelle GuruStatistix-Verzeichnis"
  116.   ))
  117.  
  118. (set #choose-locale
  119.   (cat "Wohin soll das Lokale-File? Wähle eine Directory."
  120.   ))
  121.  
  122. (set #copy-locale
  123.   (cat "Kopiere Lokale-Files"
  124.   ))
  125.  
  126. (set #copyfiles-help
  127.   (cat "Dies kopiert das angegebene File in die ausgewählte Directory."
  128.   ))
  129.  
  130. (set #inst-main
  131.   (cat "Installiere Hauptprogramm ..."
  132.   ))
  133.  
  134. (set #choose-gurudat
  135.   (cat "Wo befindet sich die MCP.gurudat Datei? Und welchen Namen hat sie?"
  136.   ))
  137.  
  138. (set #gurudat-help
  139.   (cat "Ich muss wissen wo die mcp.gurudat Datei ist, damit ich dann dem Fehler die Absturzursache zuorden kann. Wenn Du keinen Namen für die mcp.gurudat angibst wird es einen Fehler im GuruStatistixprogramm ergeben, so daß es nicht möglich sein wird die Absturzursachen zu benennen."
  140.   ))
  141.  
  142. (set #choose-guruhistory   "Wo ist die Guruhistory-Datei? Welche Bezeichnung hat sie?")
  143.  
  144. (set #guruhistory-help   "Ich brauche natürlich noch die GuruHistory-Datei mit Pfadangabe und Dateiname, denn um diese Datei dreht es sich ja.")
  145.  
  146.  
  147. (set #choose-docs   "Wo soll die Beschreibung hin? Es wird keine Schublade erstellt.")
  148.  
  149. (set #docs-help   "Dies kopierte die Anleitung in das ausgewählte Verzeichnis.")
  150.  
  151. (set #copydocs   "Kopiere Dokumentation?")
  152.  
  153. (set #copydocs-help   "Soll ich wirklich?")
  154.  
  155. (set #Locale-Copy   "Kopiere Cataloge ...")
  156.  
  157. (set #choose-stats   "Wohin sollen die Statistikfiles - GuruCharts gespeichert werden? Eine Schublade wird angelegt!")
  158.  
  159. (set #stats-help   "Dort wird dann das GuruChartsfile hin kopiert, versehen mit Datum und Uhrzeit. Auf diese Art und Weise kannst Du jederzeit die GuruCharts bis zu diesem Tag nachlesen und mit anderen Tagen vergleichen.")
  160.  
  161. (SET #exit-Msg
  162.   (CAT "\n\nViel Spaß mit dem Programm\n wünscht\n\n"
  163.                    "Steffen Clemenz\n\n\n\n\nVielen Dank an die Entwickler von MCP."
  164.   ))
  165. ))
  166. ;*********************************************
  167. ; Greetings & Path ...
  168.  
  169. (message #welcome)
  170.  
  171. (welcome)
  172.  
  173. (set @default-dest (getassign "RAM" "dva"))
  174.   (if (= @default-dest "")
  175.    (set @default-dest "SYS:"))
  176.   
  177. (set @default-dest (askdir
  178.     (prompt #choose-text)
  179.     (help #choose-help)
  180.     (default @default-dest))
  181.   ) 
  182.   
  183. (set @default-dest (tackon @default-dest "GuruStatistix"))
  184.  
  185. (makedir @default-dest (prompt #create-maindir)(infos))
  186.   
  187. ;*********************************************
  188. ; Installation procedure
  189. ; 
  190.  
  191. (copyfiles
  192.         (prompt #inst-main)
  193.         (help   @copyfiles-help)
  194.         (source "GuruStatistix")
  195.         (dest   @default-dest)
  196.         (confirm "EXPERT")
  197.         (optional "force")
  198.         (infos)
  199. )
  200.  
  201. (complete 15)
  202.  
  203. ;*********************************************
  204. ; copy of documents
  205.  
  206. (set @default-doc @default-dest)
  207.  
  208. (set @default-doc (askdir
  209.     (prompt #choose-docs)
  210.     (help #docs-help)
  211.     (default @default-doc)))
  212.  
  213. (IF (= @language "deutsch")
  214. (copyfiles
  215.        (prompt #copydocs)
  216.        (help   @copydocs-help)
  217.        (source "docs/GuruStatistixD.guide")
  218.        (dest   @default-doc)
  219.        (confirm "EXPERT")
  220.        (optional "force")
  221.        (infos))
  222. )
  223.  
  224. (IF (= @language "english")
  225. (copyfiles
  226.        (prompt #copydocs)
  227.        (help   @copydocs-help)
  228.        (source "docs/GuruStatistixE.guide")
  229.        (dest   @default-doc)
  230.        (confirm "EXPERT")
  231.        (optional "force")
  232.        (infos))
  233. )
  234.  
  235. (complete 30)
  236.  
  237. ;*********************************************
  238. ; copy the locales
  239.  
  240. (IF (= @language "deutsch")
  241. (
  242. (set @default-locale (getassign "Locale:catalogs/deutsch" "dva"))
  243.   (if (= @default-locale "")
  244.    (set @default-locale "Locale:catalogs/deutsch"))
  245.  
  246. (set @default-locale (askdir
  247.     (prompt #choose-locale)
  248.     (help #choose-help)
  249.     (default @default-locale)))
  250.  
  251. (copyfiles
  252.        (prompt #copylocale)
  253.        (help   @copyfiles-help)
  254.        (source "locale/deutsch/GuruStatistix.catalog")
  255.        (dest   @default-locale)
  256.        (confirm "EXPERT")
  257.        (optional "force")
  258.        (infos))
  259. ))
  260.  
  261. (IF (= @language "english")
  262. (
  263. (set @default-locale (getassign "Locale:catalogs/english" "dva"))
  264.   (if (= @default-locale "")
  265.    (set @default-locale "Locale:catalogs/english"))
  266.  
  267. (set @default-locale (askdir
  268.     (prompt #choose-locale)
  269.     (help #choose-help)
  270.     (default @default-locale)))
  271.  
  272. (copyfiles
  273.        (prompt #copylocale)
  274.        (help   @copyfiles-help)
  275.        (source "locale/english/GuruStatistix.catalog")
  276.        (dest   @default-locale)
  277.        (confirm "EXPERT")
  278.        (optional "force")
  279.        (infos))
  280. ))
  281.  
  282. (complete 45)
  283.  
  284. (set @default-viewer "sys:utilities/multiview")
  285.  
  286. (set @default-viewer (askfile
  287.     (prompt #choose-textviewer)
  288.     (help #textviewer-help)
  289.     (default @default-viewer)))
  290.  
  291. (complete 60)
  292.  
  293. (set @gurudat "sys:s/mcp.gurudat")
  294.  
  295. (set @gurudat (askfile
  296.     (prompt #choose-gurudat)
  297.     (help #gurudat-help)
  298.     (default @gurudat)))
  299.  
  300. (complete 75)
  301.  
  302. (set @guruhistory "sys:s/GuruHistory")
  303.  
  304. (set @guruhistory (askfile
  305.     (prompt #choose-guruhistory)
  306.     (help #guruhistory-help)
  307.     (default @guruhistory)))
  308.  
  309. (complete 90)
  310.  
  311. (set @default-stat @default-dest)
  312.  
  313. (set @default-stat (askdir
  314.     (prompt #choose-stats)
  315.     (help #stats-help)
  316.     (default @default-stat)))
  317.  
  318. (complete 100)
  319. (set @nichts (cat "NONE"))
  320.  
  321. (textfile
  322.         (dest "envarc:GuruStatistix.prefs")
  323.         (append (cat @default-locale "\n" @gurudat "\n" @default-viewer "\n" @guruhistory "\n" @default-stat "\n" @nichts))
  324.         (safe)
  325.  
  326. (textfile
  327.         (dest "env:GuruStatistix.prefs")
  328.         (append (cat @default-locale "\n" @gurudat "\n" @default-viewer "\n" @guruhistory "\n" @default-stat "\n" @nichts))
  329.         (safe)
  330.  
  331. )
  332. (makedir (cat @default-stat "/stats"))
  333. (EXIT #exit-Msg )
  334.